home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / os2 / upchk71f.zip / ADVANCED.BAT next >
DOS Batch File  |  1997-01-10  |  2KB  |  75 lines
  1. @ECHO OFF
  2.  
  3. rem !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  4. rem !!  This batch file is not required for normal usage of UpCheck       !!
  5. rem !!                                                                    !!
  6. rem !!  This is the advanced batch file that will include inserting       !!
  7. rem !!  comments into any of the support archive types (if keep original  !!
  8. rem !!  name is turned on)                                                !!   
  9. rem !!                                                                    !!
  10. rem !!  UpUtils /R will return an errorlevel depending on archive type    !!
  11. rem !!   1=ARC  2=ARJ  3=LHA  4=LZH  5=PAK  6=ZIP  7=ZOO  8=SQZ  9=UC2    !! 
  12. rem !!  13=EXE 14=GIF 15=JPG 16=???                                       !!
  13. rem !!                                                                    !!
  14. rem !!  UpUtils /E will return the errorlevel specified                   !!
  15. rem !!                                                                    !!
  16. rem !!  Remember that you must pass this file two parameters, the first   !!
  17. rem !!  being the dropfile (ie DOOR.SYS) and the second being the archive !!
  18. rem !!                                                                    !!
  19. rem !!  Example for RA: *C /C C:\RA\UPCHECK\ADVANCED.BAT C:\RA\DOOR.SYS @ !!
  20. rem !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  21.  
  22. rem *** Change to the UpCheck directory
  23. CD \RA\DOORS\UPCHECK
  24.  
  25. rem *** Run UpCheck, passing drop file and archive file
  26. UPCHECK %1 %2
  27.  
  28. rem *** Was there an error?
  29. IF ERRORLEVEL 1 GOTO :FAIL
  30.  
  31. :PASS
  32. UPUTILS /REPORT %2
  33. IF ERRORLEVEL 8 GOTO :PASSSQZ
  34. IF ERRORLEVEL 2 GOTO :PASSARJ
  35. GOTO :PASSEND
  36.  
  37. :PASSSQZ
  38. SQZ c %2 C:\BBS\COMMENT.TXT
  39. GOTO :PASSEND
  40.  
  41. :PASSARJ
  42. ARJ c %2 -zC:\BBS\COMMENT.TXT      
  43. GOTO :PASSEND
  44.  
  45. :FAIL
  46. UPUTILS /REPORT %2
  47. IF ERRORLEVEL 8 GOTO :FAILSQZ
  48. IF ERRORLEVEL 6 GOTO :FAILZIP
  49. IF ERRORLEVEL 2 GOTO :FAILARJ
  50. GOTO :FAILEND
  51.  
  52. :FAILSQZ
  53. SQZ c %2 C:\BBS\COMMENT.TXT
  54. GOTO :FAILEND
  55.  
  56. :FAILZIP
  57. PKZIP %2 -z < C:\BBS\COMMENT.TXT
  58. GOTO :FAILEND
  59.  
  60. :FAILARJ
  61. ARJ c %2 -zC:\BBS\COMMENT.TXT
  62. GOTO :FAILEND
  63.  
  64. :FAILEND
  65. rem *** Return a Non-Zero to tell the BBS the file failed
  66. UPUTILS /ERRORLEVEL 1
  67. GOTO :END
  68.  
  69. :PASSEND
  70. rem *** Return a Zero to tell the BBS the file passed
  71. UPUTILS /ERRORLEVEL 0
  72. GOTO :END
  73.  
  74. :END
  75.